Option Explicit
'ۭqҲ
Private Sub UserForm_Initialize()
    Me.CommandButton1.TakeFocusOnClick = False
End Sub

Private Sub CommandButton1_Click()
    MsgBox Me.ActiveControl.Name
End Sub
